home *** CD-ROM | disk | FTP | other *** search
/ Amiga Collections: Camelot / Camelot 098 (1990-12)(Swedish User Group of Amiga)(SE)(PD)[WB].zip / Camelot 098 (1990-12)(Swedish User Group of Amiga)(SE)(PD)[WB].adf / XLisp-Stat / Examples / tourdemo.lsp < prev   
Text File  |  1990-10-11  |  277b  |  9 lines
  1. #+macintosh(require "tour" ":Examples:tour")
  2. #+macintosh(require ":Data:iris")
  3. #+(or unix amiga)(require "tour" "Examples/tour")
  4. #+(or unix amiga)(load-data "iris")
  5.  
  6. (tour-plot 
  7.  (mapcar  #'(lambda (x) (select x (* 2 (iseq 0 74)))) iris) 
  8.  :variable-labels '("X" "Y" "Z" "W"))
  9.